
Partial Class Register
    Inherits System.Web.UI.Page

    Protected Sub CreateUserWizard1_CreatedUser(ByVal sender As Object, ByVal e As System.EventArgs) Handles CreateUserWizard1.CreatedUser
        With CreateUserWizard1
            Roles.AddUserToRole(.UserName, "WebUsers")
            'Membership.CreateUser(.UserName, .Password)
        End With
    End Sub

End Class
